home *** CD-ROM | disk | FTP | other *** search
- ##############################################################################
- #
- # Zope Public License (ZPL) Version 1.0
- # -------------------------------------
- #
- # Copyright (c) Digital Creations. All rights reserved.
- #
- # This license has been certified as Open Source(tm).
- #
- # Redistribution and use in source and binary forms, with or without
- # modification, are permitted provided that the following conditions are
- # met:
- #
- # 1. Redistributions in source code must retain the above copyright
- # notice, this list of conditions, and the following disclaimer.
- #
- # 2. Redistributions in binary form must reproduce the above copyright
- # notice, this list of conditions, and the following disclaimer in
- # the documentation and/or other materials provided with the
- # distribution.
- #
- # 3. Digital Creations requests that attribution be given to Zope
- # in any manner possible. Zope includes a "Powered by Zope"
- # button that is installed by default. While it is not a license
- # violation to remove this button, it is requested that the
- # attribution remain. A significant investment has been put
- # into Zope, and this effort will continue if the Zope community
- # continues to grow. This is one way to assure that growth.
- #
- # 4. All advertising materials and documentation mentioning
- # features derived from or use of this software must display
- # the following acknowledgement:
- #
- # "This product includes software developed by Digital Creations
- # for use in the Z Object Publishing Environment
- # (http://www.zope.org/)."
- #
- # In the event that the product being advertised includes an
- # intact Zope distribution (with copyright and license included)
- # then this clause is waived.
- #
- # 5. Names associated with Zope or Digital Creations must not be used to
- # endorse or promote products derived from this software without
- # prior written permission from Digital Creations.
- #
- # 6. Modified redistributions of any form whatsoever must retain
- # the following acknowledgment:
- #
- # "This product includes software developed by Digital Creations
- # for use in the Z Object Publishing Environment
- # (http://www.zope.org/)."
- #
- # Intact (re-)distributions of any official Zope release do not
- # require an external acknowledgement.
- #
- # 7. Modifications are encouraged but must be packaged separately as
- # patches to official Zope releases. Distributions that do not
- # clearly separate the patches from the original work must be clearly
- # labeled as unofficial distributions. Modifications which do not
- # carry the name Zope may be packaged in any form, as long as they
- # conform to all of the clauses above.
- #
- #
- # Disclaimer
- #
- # THIS SOFTWARE IS PROVIDED BY DIGITAL CREATIONS ``AS IS'' AND ANY
- # EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
- # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
- # PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL DIGITAL CREATIONS OR ITS
- # CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
- # SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
- # LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
- # USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
- # ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
- # OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
- # OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
- # SUCH DAMAGE.
- #
- #
- # This software consists of contributions made by Digital Creations and
- # many individuals on behalf of Digital Creations. Specific
- # attributions are listed in the accompanying credits file.
- #
- ##############################################################################
- """Very Simple dbm-based ZODB storage
-
- This storage provides for use of dbm files as storages that
- don't support versions or Undo. This may be useful when implementing
- objects like hit counters that don't need or want to participate
- in undo or versions.
- """
- __version__='$Revision: 1.1 $'[11:-2]
-
- import base64, POSException, time, string, utils
-
- from MappingStorage import MappingStorage
- from BaseStorage import BaseStorage
- import anydbm, os
-
- class anydbmStorage(MappingStorage):
-
- def __init__(self, filename, flag='r', mode=0666):
-
-
- BaseStorage.__init__(self, filename)
- self._index=anydbm.open(filename, flag, mode)
- self._tindex=[]
- keys=self._index.keys()
- if keys: self._oid=max(keys)
-
- def getSize(self):
- # This is a little iffy, since we aren't entirely sure what the file is
- self._lock_acquire()
- try:
- try:
- return (os.stat(self.__name__+'.data')[6] +
- os.stat(self.__name__+'.dir')[6]
- )
- except:
- try: return os.stat(self.__name__)[6]
- except: return 0
- finally: self._lock_release()
-
- class gdbmStorage(anydbmStorage):
-
- def __init__(self, filename, flag='r', mode=0666):
-
- BaseStorage.__init__(self, filename)
- import gdbm
- self._index=index=gdbm.open(filename, flag[:1]+'f', mode)
- self._tindex=[]
-
- m='\0\0\0\0\0\0\0\0'
- oid=index.firstkey()
- while oid != None:
- m=max(m, oid)
- oid=index.nextkey(oid)
-
- self._oid=m
-
- def getSize(self):
- self._lock_acquire()
- try: return os.stat(self.__name__)[6]
- finally: self._lock_release()
-
- def pack(self, t, referencesf):
-
- self._lock_acquire()
- try:
- # Build an index of *only* those objects reachable
- # from the root.
- index=self._index
- rootl=['\0\0\0\0\0\0\0\0']
- pop=rootl.pop
- pindex={}
- referenced=pindex.has_key
- while rootl:
- oid=pop()
- if referenced(oid): continue
-
- # Scan non-version pickle for references
- r=index[oid]
- pindex[oid]=r
- p=r[8:]
- referencesf(p, rootl)
-
- # Now delete any unreferenced entries:
-
- deleted=[]
- oid=index.firstkey()
- while oid != None:
- if not referenced(oid): deleted.append(oid)
- oid=index.nextkey(oid)
-
- pindex=referenced=None
-
- for oid in deleted: del index[oid]
-
- index.sync()
- index.reorganize()
-
- finally: self._lock_release()
-
-
- def _finish(self, tid, user, desc, ext):
-
- index=self._index
- for oid, p in self._tindex: index[oid]=p
- index.sync()
-